home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / graphics / qpeg11c.zip / SS24X.ASM < prev    next >
Assembly Source File  |  1993-11-08  |  2KB  |  91 lines
  1. ;
  2. ; QPEG video driver
  3. ; for Diamond SpeedStar 24X
  4. ;
  5. ; Written by Jan van Loenen for QPEG
  6. ;
  7.  
  8.         .286
  9. Code    Segment Para 'Code'
  10.         Assume  cs:Code
  11.         Org 100h
  12.  
  13. Procs   dw      Bank,Init,Exit,0
  14.  
  15. Bank:   shl     al,4
  16.         push    ax
  17.         mov     dx,03ceh
  18.         mov     al,09h
  19.         out     dx,al
  20.         inc     dx
  21.         pop     ax
  22.         push    ax
  23.         out     dx,al
  24.         dec     dx
  25.         mov     al,0ah
  26.         out     dx,al
  27.         inc     dx
  28.         pop     ax
  29.         out     dx,al
  30.         retf
  31.  
  32. Init:   mov     dx,03ceh
  33.         mov     al,0fh
  34.         out     dx,al
  35.         inc     dx
  36.         mov     al,05h
  37.         out     dx,al
  38.         mov     dx,03c4h
  39.         mov     al,06h
  40.         out     dx,al
  41.         inc     dx
  42.         mov     al,48h
  43.         out     dx,al
  44.         mov     dx,03d4h
  45.         mov     al,29h
  46.         out     dx,al
  47.         inc     dx
  48.         mov     al,85h
  49.         out     dx,al
  50.         dec     dx
  51.         mov     al,2fh
  52.         out     dx,al
  53.         inc     dx
  54.         in      al,dx
  55.         and     al,0fdh
  56.         out     dx,al
  57.         mov     dx,03ceh
  58.         mov     al,0bh
  59.         out     dx,al
  60.         inc     dx
  61.         in      al,dx
  62.         or      al,08h
  63.         out     dx,al
  64.         mov     dx,03c4h
  65.         mov     al,11h
  66.         out     dx,al
  67.         inc     dx
  68.         in      al,dx
  69.         or      al,80h
  70.         out     dx,al
  71.         retf
  72.  
  73. Exit:   mov     dx,03ceh
  74.         mov     al,0fh
  75.         out     dx,al
  76.         inc     dx
  77.         xor     al,al
  78.         out     dx,al
  79.         dec     dx
  80.         mov     al,06h
  81.         out     dx,al
  82.         inc     dx
  83.         xor     al,al
  84.         out     dx,al
  85.         retf
  86.  
  87. Code    Ends
  88.         End Procs
  89.  
  90. ; End of source.
  91.